home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 21 / AACD 21.iso / AACD / Programming / amigatalk / testfiles / TestLibrary < prev    next >
Encoding:
Text File  |  2000-05-08  |  435 b   |  15 lines

  1. lib <- Library new: 'exec.library'
  2.  
  3. 'For exec.library:' print
  4.  
  5. ('  ID      : ', (lib getIDString )) print
  6. ('  Ver     : ', (lib getVersion  )) print
  7. ('  Rev     : ', (lib getRevision )) print
  8. ('  Flags   : ', (lib getFlags    )) print
  9. ('  NegSize : ', (lib getNegSize  )) print
  10. ('  PosSIze : ', (lib getPosSize  )) print
  11. ('  Count   : ', (lib getOpenCount)) print
  12.  
  13. ('  CheckSum: ', <primitive 26 (lib getCheckSum) 16>) print
  14.  
  15. lib close